From: Eli Zaretskii <eliz@gnu.org>
Date: Tue, 4 Mar 2025 14:01:32 +0000 (+0200)
Subject: ; Improve documentation of 'shortdoc'
X-Git-Tag: archive/raspbian/1%30.2+1-2+rpi1^2~2^2~24^2~231
X-Git-Url: https://dgit.raspbian.org/%22http://www.example.com/cgi/success/%22http:/www.example.com/cgi/success?a=commitdiff_plain;h=0383937a7014934e7a9b3cf0c33c2d1f46e83901;p=emacs.git

; Improve documentation of 'shortdoc'

* lisp/emacs-lisp/shortdoc.el (shortdoc-display-group): Fix doc
string and wording of prompt.  (Bug#76723)
---

diff --git a/lisp/emacs-lisp/shortdoc.el b/lisp/emacs-lisp/shortdoc.el
index 230df47821c..e74167cb1c7 100644
--- a/lisp/emacs-lisp/shortdoc.el
+++ b/lisp/emacs-lisp/shortdoc.el
@@ -1468,10 +1468,12 @@ A FUNC form can have any number of `:no-eval' (or `:no-value'),
 ;;;###autoload
 (defun shortdoc-display-group (group &optional function same-window)
   "Pop to a buffer with short documentation summary for functions in GROUP.
+Interactively, prompt for GROUP.
 If FUNCTION is non-nil, place point on the entry for FUNCTION (if any).
 If SAME-WINDOW, don't pop to a new window."
-  (interactive (list (completing-read "Show summary for functions in: "
-                                      (mapcar #'car shortdoc--groups))))
+  (interactive (list (completing-read
+                      "Group of functions for which to show summary: "
+                      (mapcar #'car shortdoc--groups))))
   (when (stringp group)
     (setq group (intern group)))
   (unless (assq group shortdoc--groups)